Object[] (gb)

Essa classe implementa uma matriz dinâmica de referências Object.

This class inherits Array.

This class is creatable.

This class acts like a read / write array.

This class is enumerable with the FOR EACH keyword.

Properties
First  
Last  

Inherited properties
Bounds   Retorna uma classe virtual que representa os limites de cada dimensão da matriz.
Count   Retorna o número de elementos da matriz.
Data   Retorna um ponteiro para os dados do array.
Dim   Retorna o número de dimensões de um array.
Empty  
Length   Retorna o número de elementos na matriz.
Max   Retorna o maior índice do array.
ReadOnly  
Type   Retorna o tipo de dados que pode ser armazenado na matriz.

Methods
Add   Insere um elemento na matriz na posição especificada por Index.
Copy   Returns a deep copy of the array.
Delete   Um sinônimo para Extract.
Equals  
Exist   Retorna TRUE se o valor especificado existe na matriz.
ExistByRef   Verificar se um objeto específico está armazenados na matriz.
ExistByRefSorted  
ExistSorted  
Extract   Remove um ou mais elementos da matriz, e o retorna.
Fill   Preenche a matriz com o valor especificado.
Find   Retorna a posição da primeira ocorrência de Value procurado na matriz.
FindByRef   Retornar à posição da primeira ocorrência de um objeto específico da matriz.
FindByRefSorted  
FindSorted  
Insert   Insira um array na array atual no local especificado por Pos.
Pop   Remove o último elemento do array e o retorna.
Push   Adiciona um elemento na extremidade da matriz.
Reverse   Inverter a ordem dos elementos do array, e retorna um array.
Sort   Classifica a matriz.
SortUsing  

Inherited methods
Clear   Remove a matriz.
Remove   Remove um ou mais elementos do array.
Resize   Redimensiona o array.
Shuffle  

Examplo

Este exemplo mostra como criar uma matriz de TextBox

PUBLIC aobjDisplay AS Object[9, 9]

PUBLIC SUB Form_Open()
DIM r AS Integer
DIM c AS Integer
DIM objTextBox AS TextBox

FOR r = 0 TO 8
    FOR c = 0 TO 8
      objTextBox = NEW TextBox(ME) ' criar o próxima dos 9 * 9 TextBoxes
      objTextBox.Y = 9 + r * 40
      objTextBox.X = 9 + c * 40
      objTextBox.Width = 32
      objTextBox.Height = 32
      aobjDisplay[r, c] = objTextBox
    NEXT '    c
  NEXT '      r
ENDIF